package AlignBeam;

sub new {

	my($this) = [];
	my($classname) = shift;
	my($K) = shift;
	my($i,$j);

	for($i=0;$i<$K;$i++)
	{
		$this->[$i] = new Align;
	}
	return $this;
}

1;
